not.java

JAVA 数学程序库 提供常规的数值计算程序包

package jmathlib.toolbox.jmathlib.matrix;

import jmathlib.core.tokens.numbertokens.DoubleNumberToken;
import jmathlib.core.tokens.Token;
import jmathlib.core.tokens.OperandToken;
import jmathlib.core.tokens.LogicalToken;
import jmathlib.core.functions.ExternalFunction;

/**An external function for computing NOT a matrix        */
public class not extends ExternalFunction
{
	/**return a  matrix 
	* @param operands[0] = matrix 
	* @return matrix function NOT of each element  */
	public OperandToken evaluate(Token[] operands)
	{

        // two operands (e.g. not(A) )
        if (getNArgIn(operands) != 1)
            throwMathLibException("not: number of arguments != 1");
        

        if (operands[0] instanceof DoubleNumberToken)
        {
            DoubleNumberToken num = (DoubleNumberToken)operands[0];
            int         n   = num.getNumberOfElements();
            
    		boolean[] values = new boolean[n];
            
    		for (int i=0; i<n ; i++)
    		{
                if (num.getValueIm(i)!=0.0)
                    throwMathLibException("not: only works on REAL numbers");
                    
				if (num.getValueRe(i) != 0.0)
				{
					values[i] = false;
				}
				else
				{
					values[i] = true;
				}
    		}	
    		return new LogicalToken(num.getSize(), values);		
        }
        else if (operands[0] instanceof LogicalToken)
        {
            LogicalToken l   = (LogicalToken)operands[0];
            int          n   = l.getNumberOfElements();
            boolean[]    ret = new boolean[n];
            
            for (int i=0; i<n; i++)
            {
                ret[i] = !l.getValue(i);
            }
            
            return new LogicalToken(l.getSize(), ret);
        }
        else
        {
            throwMathLibException("not: works on numbers and logical only");
            return null;
        }
        
	} // end eval
}

/*
@GROUP
matrix
@SYNTAX
answer = not(matrix)
@DOC
Returns the boolean NOT of all the elements of a matrix.
@NOTES
@EXAMPLES
<programlisting>
not([false, true]) = [true, false]
not([1,1;1,1])     = [0,0;0,0]
not([0,1,2])       = [1,0,0]
</programlisting>
@SEE
and, or, xor
*/