~drizzle-trunk/drizzle/development

492.3.10 by Lee
code clean move Item_func_acos, Item_func_asin, Item_func_atan, Item_func_pow, Item_func_sqrt to functions directory
1
/* -*- mode: c++; c-basic-offset: 2; indent-tabs-mode: nil; -*-
2
 *  vim:expandtab:shiftwidth=2:tabstop=2:smarttab:
3
 *
4
 *  Copyright (C) 2008 Sun Microsystems
5
 *
6
 *  This program is free software; you can redistribute it and/or modify
7
 *  it under the terms of the GNU General Public License as published by
8
 *  the Free Software Foundation; version 2 of the License.
9
 *
10
 *  This program is distributed in the hope that it will be useful,
11
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of
12
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
 *  GNU General Public License for more details.
14
 *
15
 *  You should have received a copy of the GNU General Public License
16
 *  along with this program; if not, write to the Free Software
17
 *  Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
18
 */
19
20
#include <drizzled/server_includes.h>
21
#include CSTDINT_H
642.1.30 by Lee
move math functions to drizzled/function/math directory
22
#include <drizzled/function/math/atan.h>
572.1.4 by Monty Taylor
Removed a bunch of unusued tests and defines from autoconf.
23
#include CMATH_H
24
25
#if defined(CMATH_NAMESPACE)
26
using namespace CMATH_NAMESPACE;
27
#endif
28
492.3.10 by Lee
code clean move Item_func_acos, Item_func_asin, Item_func_atan, Item_func_pow, Item_func_sqrt to functions directory
29
30
double Item_func_atan::val_real()
31
{
32
  assert(fixed == 1);
33
  double value= args[0]->val_real();
34
  if ((null_value=args[0]->null_value))
35
    return 0.0;
36
  if (arg_count == 2)
37
  {
38
    double val2= args[1]->val_real();
39
    if ((null_value=args[1]->null_value))
40
      return 0.0;
41
    return fix_result(atan2(value,val2));
42
  }
43
  return atan(value);
44
}
45