Changeset 1246 for trunk/psLib/src/dataManip/psMatrixVectorArithmetic.c

Timestamp:

Jul 20, 2004, 2:09:11 PM (22 years ago)

Author:

harman

Message:

Updated for Macintosh compatibility

File:

• trunk/psLib/src/dataManip/psMatrixVectorArithmetic.c (modified) (2 diffs)

trunk/psLib/src/dataManip/psMatrixVectorArithmetic.c

@@ -29 +29 @@
  *  @author Ross Harman, MHPCC
  *
- *  @version $Revision: 1.17 $ $Name: not supported by cvs2svn $
- *  @date $Date: 2004-07-20 20:57:30 $
+ *  @version $Revision: 1.18 $ $Name: not supported by cvs2svn $
+ *  @date $Date: 2004-07-21 00:09:11 $
  *
  *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -615 +615 @@
 } else if(!strncmp(OP, "log", 3)) {                                                                          \
     if(PS_IS_PSELEMTYPE_COMPLEX(IN->type)) {                                                                 \
-        UNARY_TYPE(DIM,OUT,IN,log10(cabs(*i1)+carg(*i1)*I));                                                 \
+        UNARY_TYPE(DIM,OUT,IN,clog(*i1)/log(10.0));                                                 \
     } else {                                                                                                 \
         UNARY_TYPE(DIM,OUT,IN,log10(*i1));                                                                   \