Package erjang

Examples of erjang.ENumber

133
134
135
136
137
138
139
140
141
142
143
  }

  @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
143
144
145
146
147
148
149
150
151
152
153
  }

  @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
153
154
155
156
157
158
159
160
161
162
163
  }

  @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
163
164
165
166
167
168
169
170
171
172
173
174
  }

  @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
186
187
188
189
190
191
192
193
194
195
196
  }

  @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
875
876
877
878
879
880
881
882
883
884
885
  // 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
884
885
886
887
888
889
890
891
892
893
894
    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
893
894
895
896
897
898
899
900
901
902
903
    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
917
918
919
920
921
922
923
924
925
926
927
928
929
930
    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
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
    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
TOP

Related Classes of erjang.ENumber

  • erjang.m.erlang.ErlBif
  • erjang.m.ets.ETableSet
  • erjang.m.math.Native
  • java.math.BigInteger
    • Copyright © 2018 www.massapicom. All rights reserved.
    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.