Mercurial > hg > octave-nkf

comparison src/ov-complex.h @ 5260:deed800e7bef

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[project @ 2005-03-30 23:18:58 by jwe]
author jwe
date Wed, 30 Mar 2005 23:18:58 +0000
parents ea96466f98ea
children 4c8a2e4e0717
comparison
equal deleted inserted replaced
5259:462fd886f33f 5260:deed800e7bef
1 #define OCTAVE_STD std
1 /* 2 /*
2 3
3 Copyright (C) 1996, 1997 John W. Eaton 4 Copyright (C) 1996, 1997 John W. Eaton
4 5
5 This file is part of Octave. 6 This file is part of Octave.
76 octave_value do_index_op (const octave_value_list& idx, int resize_ok); 77 octave_value do_index_op (const octave_value_list& idx, int resize_ok);
77 78
78 octave_value any (int = 0) const 79 octave_value any (int = 0) const
79 { 80 {
80 return (scalar != Complex (0, 0) 81 return (scalar != Complex (0, 0)
81 && ! (lo_ieee_isnan (::real (scalar)) 82 && ! (lo_ieee_isnan (OCTAVE_STD::real (scalar))
82 || lo_ieee_isnan (::imag (scalar)))); 83 || lo_ieee_isnan (OCTAVE_STD::imag (scalar))));
83 } 84 }
84 85
85 bool is_complex_scalar (void) const { return true; } 86 bool is_complex_scalar (void) const { return true; }
86 87
87 bool is_complex_type (void) const { return true; } 88 bool is_complex_type (void) const { return true; }