/[escript]/trunk/escript/src/UnaryFuncs.h
ViewVC logotype

Annotation of /trunk/escript/src/UnaryFuncs.h

Parent Directory Parent Directory | Revision Log Revision Log


Revision 155 - (hide annotations)
Wed Nov 9 02:02:19 2005 UTC (13 years, 11 months ago) by jgs
Original Path: trunk/escript/src/Data/UnaryFuncs.h
File MIME type: text/plain
File size: 1205 byte(s)
move all directories from trunk/esys2 into trunk and remove esys2

1 jgs 102 // $Id$
2     /*
3     ******************************************************************************
4     * *
5     * COPYRIGHT ACcESS 2004 - All Rights Reserved *
6     * *
7     * This software is the property of ACcESS. No part of this code *
8     * may be copied in any form or by any means without the expressed written *
9     * consent of ACcESS. Copying, use or modification of this software *
10     * by any unauthorised person is illegal unless that person has a software *
11     * license agreement with ACcESS. *
12     * *
13     ******************************************************************************
14     */
15    
16     #if !defined escript_UnaryFuncs_20041124_H
17     #define escript_UnaryFuncs_20041124_H
18    
19     namespace escript {
20    
21     inline
22     double
23     fsign(double x)
24     {
25 jgs 123 if (x == 0) {
26     return 0;
27     } else {
28     return x/fabs(x);
29     }
30 jgs 102 }
31    
32     } // end of namespace
33     #endif

Properties

Name Value
svn:eol-style native
svn:keywords Author Date Id Revision

  ViewVC Help
Powered by ViewVC 1.1.26