Examples of ENumber

erjang.ENumber

Examples of erjang.ENumber

  }


  @BIF
  public static EDouble exp(EObject val)
  {
    ENumber num;
    if ((num = val.testNumber()) != null) {
      return boxIfValid(Math.exp(num.doubleValue()), val);
    }
    throw ERT.badarg(val);
  }

View Full Code Here

Examples of erjang.ENumber

  }


  @BIF
  public static EDouble log(EObject val)
  {
    ENumber num;
    if ((num = val.testNumber()) != null) {
      return boxIfValid(Math.log(num.doubleValue()), val);
    }
    throw ERT.badarg(val);
  }

View Full Code Here

Examples of erjang.ENumber

  }


  @BIF
  public static ENumber log10(EObject val)
  {
    ENumber num;
    if ((num = val.testNumber()) != null) {
      return boxIfValid(Math.log10(num.doubleValue()), val);
    }
    throw ERT.badarg(val);
  }

View Full Code Here

Examples of erjang.ENumber

  }


  @BIF
  public static EDouble atan2(EObject val1, EObject val2)
  {
    ENumber num1, num2;
    if ((num1 = val1.testNumber()) != null 
      && (num2 = val2.testNumber()) != null) {
      return new EDouble(Math.atan2(num1.doubleValue(), num2.doubleValue()));
    }
    throw ERT.badarg(val1, val2);
  }

View Full Code Here

Examples of erjang.ENumber

  }


  @BIF
  public static EDouble sqrt(EObject val)
  {
    ENumber num;
    if ((num = val.testNumber()) != null) {
      return boxIfValid(Math.sqrt(num.doubleValue()), val);
    }
    throw ERT.badarg(val);
  }

View Full Code Here

Examples of erjang.ENumber


  // arithmetic


  @BIF(name = "+")
  static public ENumber not_neg(EObject v1) {
    ENumber n1;
    if ((n1 = v1.testNumber()) != null) {
      return n1;
    }
    throw ERT.badarg(v1);
  }

View Full Code Here

Examples of erjang.ENumber

    throw ERT.badarg(v1);
  }
  
  @BIF(name = "-")
  static public ENumber neg(EObject v1) {
    ENumber n1;
    if ((n1 = v1.testNumber()) != null) {
      return n1.negate();
    }
    throw ERT.badarg(v1);
  }

View Full Code Here

Examples of erjang.ENumber

    throw ERT.badarg(v1);
  }


  @BIF(name = "-", type=Type.GUARD)
  static public ENumber neg$g(EObject v1) {
    ENumber n1;
    if ((n1 = v1.testNumber()) != null) {
      return n1.negate();
    }
    return null;
  }

View Full Code Here

Examples of erjang.ENumber

    return n1.idiv(v2);
  }


  @BIF(name = "div", type = Type.GUARD)
  static public EInteger div$g(EObject v1, EObject v2) {
    ENumber n1, n2;
    if ((n1 = v1.testInteger()) != null &&
        (n2 = v2.testInteger()) != null)
    {
      if (n2.erlangEquals(ESmall.ZERO)) return null;
      return n1.idiv(n2);
    }
    return null;
  }

View Full Code Here

Examples of erjang.ENumber

    return v1.subtract(v2, true);
  }


  @BIF(name = "/", type = Type.GUARD)
  static public ENumber divide$p(EObject v1, EObject v2) {
    ENumber n1;
    if ((n1 = v1.testNumber()) != null) {
      ENumber n2;
      if ((n2 = v2.testNumber()) != null) {
        if (n2.doubleValue() == 0.0)
          return null;
        return n1.divide(v2);
      }
    }
    return null;

View Full Code Here

0 1 2

TOP

All source code are property of their respective owners. Java is a trademark of Sun Microsystems, Inc and owned by ORACLE Inc. Contact coftware#gmail.com.