01: /*
02: * @(#)atan2.java 1.2 04/12/06
03: *
04: * Copyright (c) 2001-2004 Sun Microsystems, Inc. All Rights Reserved.
05: *
06: * See the file "LICENSE.txt" for information on usage and redistribution
07: * of this file, and for a DISCLAIMER OF ALL WARRANTIES.
08: */
09: package org.pnuts.math;
10:
11: import pnuts.lang.PnutsFunction;
12: import pnuts.lang.Context;
13:
14: public class atan2 extends PnutsFunction {
15:
16: public atan2() {
17: super ("atan2");
18: }
19:
20: public boolean defined(int nargs) {
21: return nargs == 2;
22: }
23:
24: protected Object exec(Object[] args, Context context) {
25: if (args.length != 2) {
26: undefined(args, context);
27: return null;
28: }
29: return new Double(Math.atan2(((Number) args[0]).doubleValue(),
30: ((Number) args[1]).doubleValue()));
31: }
32:
33: public String toString() {
34: return "function atan2(x, y)";
35: }
36: }
|