/*  SCCS - @(#)NslFloat1.java	1.13 - 09/20/99 - 19:19:48 */

// 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.

////////////////////////////////////////////////////////////////////////////////
// NslFloat1.java

/**
* NslFloat1 - single precision floating point one dimensional array
*/
package nslj.src.lang;


public class NslFloat1 extends NslNumeric1 {
// <CHANGED>
  public float[] _data;
  //public String _name;
  //boolean visibility = true;
  //NslHierarchy module;

  ////////////////////////////////////////////////////////////////////
  // constructors


  /**
   * Constructor, copy the contain of array <tt>d</tt> to
     the new number
   * @param d - the value of new number
   */
  public NslFloat1(float[] d) {
	super();
    _data = new float[d.length];
    set(d);
    //_name = null;
  }

  /**
   * Constructor, initialize the value to the same as another <tt>NslNumeric1</tt>
   * @param n - a 1-D array
   */
  public NslFloat1(NslNumeric1 n) {
	super();

    _data = new float[n.getSize()];
    set(n.getfloat1());
    //_name = null;
  }

  /**
   * Constructor, initialize the number to be size <tt>size</tt> 1-D array
   * @param size - size of the new array
   */
  public NslFloat1(int size) {
	super();

    _data = new float[size];
    //_name = null;
  }

  /**
   * Constructor - initialize the reference of the number to be null
   * @see NslPort, NslInport
   */
  public NslFloat1() {
	super();

    _data=null;
    //_name = null;
  }



  /**  
    * This constructs a number with specified name
    * @param name - name of the variable
    */
  public NslFloat1(String name) {
	super(name);

    _data = null;
    //_name = name;
  }
  public NslFloat1(String name, NslHierarchy curParent) {
	super(name,curParent,curParent.nslGetAccess());

    _data = null;
    //_name = name;
    //module = curParent;
    //visibility = module.getVisibility();
    //module.enableAccess(this);
  }

  /**
    * This constructs a number with specified name
    * @param name - name of the variable
    * @param n - initialized values
    */
  public NslFloat1(String name, NslNumeric1 n) {
	super(name);

    _data = new float[n.getSize()];
    set(n.getfloat1());
    //_name = name;
  
  }
  public NslFloat1(String name, NslHierarchy curParent, NslNumeric1 n) {
	super(name,curParent,curParent.nslGetAccess());

    _data = new float[n.getSize()];
    set(n.getfloat1());
    //_name = name;
    //module = curParent;
    //visibility = module.getVisibility();
    //module.enableAccess(this);
  
  }
  /**
    * This constructs a number with specified name
    * @param name - name of the variable
    * @param size - size of the array
    */
  public NslFloat1(String name, int size) {
	super(name);

    _data = new float[size];
    //_name = name;
  }
  public NslFloat1(String name, NslHierarchy curParent, int size) {
	super(name,curParent,curParent.nslGetAccess());

    _data = new float[size];
    _name = name;
    ////module = curParent;
    //visibility = module.getVisibility();
    //module.enableAccess(this);
  }


  /**
   * Constructor, copy the contain of array <tt>d</tt> to the new number
   * @param name - name of the variable
   * @param d - the value of new number
   */
  // aa
  public NslFloat1(String name, float[] d) {
	super(name);
    _data = new float[d.length];
    set(d);
    //_name = name;
  }
    public void nslMemAlloc(int size) {
	_data = new float[size];
    }
//--------------gets---------------------------------------
/**
   * Get the contain of 1D array
     in single precision floating point
   * @return array - in single precision pointing point
   */
   public float[] get() {
    return _data;
  }

public float get(int pos1) {
    return _data[pos1];
  }

/**
   * Get the array
     in double precision floating point
   * @return array - in double precision pointing point
   */
  public double[] getdouble1() {
    double[] doubledata = new double[_data.length];
    int i;

    for (i=0; i<_data.length; i++) {
      doubledata[i]=(double)_data[i];
    }

    return doubledata;

  }
/**
   * Get the array
     in single precision floating point
   * @return array - in single precision pointing point
   */
  public float[] getfloat1() {
    return _data;
  }
/**
   * Get the array
     in integer
   * @return array - in integer
   */
  public int[] getint1() {
    int[] intdata = new int[_data.length];
    int i;

    for (i=0; i<_data.length; i++) {
      intdata[i] = (int)_data[i];
    }

    return intdata;
  }

/**
   * Get the value of <tt>pos</tt>th element in this number
     in double precision floating point
   * @param pos - position of the array
   * @return value - in double precision pointing point
   */
  public double getdouble(int pos) {
    return (double)_data[pos];
  }


  /**
   * Get the value of <tt>pos</tt>th element in this number
     in single precision floating point
   * @param pos - position of the array
   * @return value - in single precision pointing point
   */
  public float getfloat(int pos) {
    return _data[pos];
  }


  /**
   * Get the value of <tt>pos</tt>th element in this number
     in integer
   * @param pos - position of the array
   * @return value - in integer
   */
  public int getint(int pos) {
    return (int)_data[pos];
  }


  /**
   * Create a <tt>NslDouble1</tt> array with the same value as this array
   * @return array - in NslDouble1
   */
  public NslDouble1 getNslDouble1() {
    return (new NslDouble1(getdouble1()));
  }

  /**
   * Get a <tt>NslFloat1</tt> array with the same value as this array
   * @return array - in NslFloat1
   */
  public NslFloat1 getNslFloat1() {
    return this;
  }

  /**
   * Create a <tt>NslInt1</tt> array with the same value as this array
   * @return array - in NslInt1
   */
  public NslInt1 getNslInt1() {
    return (new NslInt1(getint1()));
  }

  /**
   * Create an array that captures element <tt>start</tt> to <tt>end</tt>
     if <tt>start</tt> is smaller than 0, <tt>start</tt> is default as 0;
     if <tt>end</tt> is greater than the length of the array,
        <tt>end</tt> is default as the length of the array
   * @param start - the element number start the capture
   * @param end - the element number ends the capture
   * @return a section of the original array
   */
  public float[] getSector(int start, int end) {
    int i;
    int j;
    int length;
    float[] floatdata;
    if (start < 0)
      start = 0;
    if (end > _data.length)
      end = _data.length;
    length = end-start+1;
    floatdata = new float[length];
    i = start;
    for (j=0; j<length; j++, i++) {
      floatdata[j]=_data[i];
    }
    return floatdata;
  }



  /**
   * Set the value of this array to <tt>value</tt>
   * @param value
   */
  public void set(double[] value) {
    int i;

    if (_data.length != value.length) {
      System.out.println("NslFloat1: internal data length not equal set value length. set() ignored");
      return;
    }

    for (i=0; i<_data.length; i++) {
      _data[i]=(float)value[i];
    }
    return;
  }


  /**
   * Set the value of this array to <tt>value</tt>
   * @param value
   */
  public void set(float[] value) {
    int i;

    if (_data.length != value.length) {
      System.out.println("NslFloat1: array length not match");
      return;
    }

    for (i=0; i<_data.length; i++) {
      _data[i]=value[i];
    }
    return;
  }


  /**
   * Set the value of this array to <tt>value</tt>
   * @param value
   */
  public void set(int[] value) {
    int i;

    if (_data.length != value.length) {
      System.out.println("NslFloat1: array length not match");
      return;
    }

    for (i=0; i<_data.length; i++) {
      _data[i]=(float)value[i];
    }
    return;
  }


  /**
   * Set the <tt>pos</tt>th element of this array to <tt>value</tt>
   * @param pos
   * @param value
   */
  public void set(int pos, double value) {
    _data[pos]=(float)value;
    return;
  }
  /**
   * Set the <tt>pos</tt>th element of this array to <tt>value</tt>
   * @param pos
   * @param value
   */
  public void set(int pos, float value) {
    _data[pos]=value;
    return;
  }
  /**
   * Set the <tt>pos</tt>th element of this array to <tt>value</tt>
   * @param pos
   * @param value
   */
  public void set(int pos, int value) {
    _data[pos]=(float)value;
    return;
  }



  /**
   * Set all elements of this array to <tt>value</tt>
   * @param value
   */
  public void set(double value) {
    int i;

    for (i=0; i<_data.length; i++) {
      _data[i]=(float)value;
    }
    return;
  }
  /**
   * Set all elements of this array to <tt>value</tt>
   * @param value
   */
  public void set(float value) {
    int i;

    for (i=0; i<_data.length; i++) {
      _data[i]=value;
    }
    return;
  }


  /**
   * Set all elements of this array to <tt>value</tt>
   * @param value
   */
  public void set(int value) {
    int i;

    for (i=0; i<_data.length; i++) {
      _data[i]=(float)value;
    }
    return;
  }



  /**
   * Set the value of this array to <tt>value</tt>
   * @param value
   */
  public void set(NslNumeric1 value) {
    int i;


    if (_data.length != value.getSize()) {
      System.out.println("NslFloat1: internal data length not equal set value length. set() ignored");
      return;
    }
    set(value.getfloat1());
    return;
  }



  /**
   * Set all elements of this array to <tt>value</tt>
   * @param value
   */
  public void set(NslNumeric0 value) {
    int i;

    for (i=0; i<_data.length; i++) {
      _data[i]=value.getfloat();
    }
    return;
  }

/**
   * Set the <tt>pos</tt>th element of this array to <tt>value</tt>
   * @param pos
   * @param value
   */
  public void set(int pos, NslNumeric0 value) {
    _data[pos]=value.getfloat();
    return;
  }

  /**
   * Set the value of the array from <tt>startpos</tt> to d
     If the array <tt>d</tt> longer than this array, those
     out of array scope elements are ignored.
   * @param d - object 1-D array
   * @startpos - the element number to start copying
   */
  public void setSector(float[] d, int startpos) {
    int endpos = d.length+startpos;
    int i;
    int j=0;

    if (startpos > _data.length)
        return;
    if (endpos > _data.length)
        endpos = _data.length;
    for (i=startpos; i<endpos; i++, j++)
        _data[i] = d[j];
  }

//-------various-------------------------
  /**
   * get the size of this array
   * @return size of this array in a vector of 4 elements
   */
  public int[] getSizes() {
	int[]size =new int[4];
     	size[0]=(_data==null?0:_data.length);
	size[1]=0;
 	size[2]=0;
	size[3]=0;
	return(size);
  }
  public void getNslSize(NslInt0 size) {
	size.set((_data==null?0:_data.length));
  }


/**
   * get the size of this array at the first dimension
   * @return size of this array
   */
  public int getSize() {
    return (_data==null?0:_data.length);
  }


/**
   * get the size of this array at the first dimension
   * @return size of this array
   */
  public int getSize1() {
    return (_data==null?0:_data.length);
  }


/*
     Duplicating data between buffers in double buffering port model.
     Since we cannot ensure the copy is the original copy created
     in instantiation, this code is to make a security check and
     to make sure the program runs correctly in the latter step.
     */
  public void duplicateData(NslData n) {
    try {
      /* Here we assume that the passed parameter is originally a
	 NslInt1 class. Otherwise, it will force a ClassCastException
	 and notify the NslSystem.
	 */
      set(((NslFloat1)n).getfloat1());

    } catch (ClassCastException e) {
      System.out.println("Class exception is caught in data duplication");
      System.out.println("between two copies of buffer.");
      System.out.println("Please check NslPort arrangement");
      throw e;
    }
  }

  /**
   * Copy itself
   * @return a copy of this array, casted to NslNumeric
   * @see NslOutport
   */
  public NslData duplicateThis() {
    if (isDataSet())
      return (NslData)(new NslFloat1(getfloat1()));
    else
      return (NslData)(new NslFloat1());
  }

   /**
    Reset the reference of <tt>_data</tt> to a number object
    @param n number to be reference
    */
  public void setReference(NslData n) {
    try {
      _data = ((NslFloat1) n).getfloat1();
    } catch (ClassCastException e) {
      System.out.println("Class exception is caught in reference setting");
      System.out.println("between two copies of buffer.");
      System.out.println("Please check NslPort arrangement");
      throw e;
    }
  }


  /**
   * Check if the reference is well-defined
   * @return true - if the reference is defined; false - if reference is null
   */
  public boolean isDataSet() {
    return (_data != null);
  }
  /** Reset the reference pointer to null
   */
  public void resetData() {
    _data = null;
  }
  //<CHANGED>
  public void print() {
    System.out.print(toString());
  }

  public String toString() {
    StringBuffer strbuf = new StringBuffer();
    int i;
    for(i=0; i<_data.length; i++)
      strbuf.append(_data[i]+" ");
    //strbuf.append("\n");
    return strbuf.toString();
  }


  //</CHANGED>
/**
   * sum all elements of the array
   * @return the sum
   */
/*
  public float sum() {
    float sum = 0;
    int i;

    for (i=0; i<_data.length; i++) {
      sum+=_data[i];
    }
    return sum;
  }
*/

  /**
   * Get the element with maximum value
   * @param max_elem_pos - the position of the element with maximum value
   * @return the maximum value
   */
/*
  public float maxElem(NslInt0 max_elem_pos) {
    float value = java.lang.Float.NEGATIVE_INFINITY;
    int i;
    int pos =-1;

    for (i=0; i<_data.length; i++) {
      if (_data[i]>value) {
	pos = i;
	value = _data[i];
      }
    }
    max_elem_pos.set(pos);
    return value;
  }
*/
  /**
   * Get the maximum value of this array
   * @return the maximum value
   */
/*
  public float maxValue() {
    return maxElem(new NslInt0(0));
  }
*/
  /**
   * Get the element with minimum value
   * @param min_elem_pos - the position of the element with minimum value
   * @return the minimum value
   */
/*
  public float minElem(NslInt0 min_elem_pos) {
    float value = java.lang.Float.POSITIVE_INFINITY;
    int i;
    int pos =-1;

    for (i=0; i<_data.length; i++) {
      if (_data[i]<value) {
	pos = i;
	value = _data[i];
      }
    }
    min_elem_pos.set(pos);
    return value;
  }
*/
  /**
   * Get the minimum value of this array
   * @return the minimum value
   */
/*
  public float minValue() {
    return minElem(new NslInt0(0));
  }
*/


}

// NslFloat1.java
////////////////////////////////////////////////////////////////////////////////