MATH_LTOperator.h

Go to the documentation of this file.

#ifndef MATH_LTOperator_H
#define MATH_LTOperator_H

#include "MATH_BinaryOperator.h"
#include "MATH_Variable.h"

DEFINE_SPTR(MATH_LTOperator);
class MATH_LTOperator : public MATH_BinaryOperator {
    SP_OBJECT(MATH_LTOperator);
    
    // ATTRIBUTES

    
protected: 
    // METHODS
  
    // CONSTRUCTORS 
  
    MATH_LTOperator(void) {
        setName("<");
        setPriority(0);
    }
    
    
    
    // DESTRUCTORS 
  
    
    virtual ~MATH_LTOperator(void) {
    }
    
    
private:

public:
    static inline SP::MATH_LTOperator New() {
        SP::MATH_LTOperator p(new MATH_LTOperator(),MATH_LTOperator::Delete());
        p->setThis(p);
        return p;
    }
    
    virtual SP::MATH_NodeExpression newInstance() const {
        return New();
    }
    
    
    // SET methods 
    
    
    // GET methods
   
public:
    // OTHERS methods
    virtual int evaluate(const tFlag& action,MATH_Environment& symbols,MATH_Variable& var) const {
        SPC::MATH_ChildExpression arg1=getArgument(0);
        SPC::MATH_ChildExpression arg2=getArgument(1);
        if ((arg1.get()==null) || (arg2.get()==null)) return NULL_OPERAND;
        
        int retCode=0;
        
        //tFlag type1;
        
        
        int i1=var.getStartIndex();
        if (arg1.get()!=null)  retCode=arg1->evaluate(ALGEBRIC,symbols,var);
        //type1=var.getType();
        
        int i2=var.getSize();
        var.setFirstIndex(i2+i1);
        if (arg2.get()!=null)  retCode=arg2->evaluate(ALGEBRIC,symbols,var);
        int n=var.getSize();
        var.setFirstIndex(i1);
        double *var1=&var[0];//size i2
        const double *var2=&var[i2];//size n
        
      
     
        //m=min(n,i2)
        int i,m=(i2<n)?i2:n;
        tBoolean ok=true;
        for (i=0;i<m;i++) {
            if (var1[i]<var2[i]) {
                ok=true;
                break;
            } else if (var1[i]>var2[i]) {
                ok=false;
                break;
            } 
        }
        if ((i==m) && (i2<=n)) ok=true;
        var1[0]=ok;
        var.setSize(1);
        

        var.setType(MATH_Variable::BOOLEAN);
       
        return retCode; 
    }
    
    
};

#endif