/* SCCS @(#)NslMinElem.java 1.3 --- 09/01/99 -- 00:18:14 */ // Copyright: Copyright (c) 1997 University of Southern California Brain Project. // Copyright: This software may be freely copied provided the toplevel // Copyright: COPYRIGHT file is included with each such copy. // Copyright: Email nsl@java.usc.edu. //////////////////////////////////////////////////////////// // // Minimum element routines // // /** Minimum element routines. There is only one format for the evaluation method in this routine: 1, eval(a) -> i[] a is the parameter to evaluate the element of and the result is passed out as an array of indexes i */ package nslj.src.math; import nslj.src.lang.NslNumeric1; import nslj.src.lang.NslNumeric2; import nslj.src.lang.NslNumeric3; import nslj.src.lang.NslNumeric4; import nslj.src.lang.NslDouble1; import nslj.src.lang.NslDouble2; import nslj.src.lang.NslDouble3; import nslj.src.lang.NslDouble4; import nslj.src.lang.NslFloat1; import nslj.src.lang.NslFloat2; import nslj.src.lang.NslFloat3; import nslj.src.lang.NslFloat4; import nslj.src.lang.NslInt1; import nslj.src.lang.NslInt2; import nslj.src.lang.NslInt3; import nslj.src.lang.NslInt4; public final class NslMinElem { //---------------------------------------------------------- // native double public static int eval(double[] _data) { double value = java.lang.Double.POSITIVE_INFINITY; int i; int pos=-1; for (i=0; i<_data.length; i++) { if (_data[i]