Index: trunk/psLib/src/astronomy/slalib.h
===================================================================
--- trunk/psLib/src/astronomy/slalib.h	(revision 1524)
+++ trunk/psLib/src/astronomy/slalib.h	(revision 1525)
@@ -7,6 +7,6 @@
 *  @author Robert DeSonia, MHPCC
 *
-*  @version $Revision: 1.5 $ $Name: not supported by cvs2svn $
-*  @date $Date: 2004-08-13 01:12:50 $
+*  @version $Revision: 1.6 $ $Name: not supported by cvs2svn $
+*  @date $Date: 2004-08-13 01:14:26 $
 *
 *  Copyright 2004 Maui High Performance Computing Center, University of Hawaii
@@ -19,31 +19,31 @@
 #ifdef FORTRAN_DOUBLE_UNDERSCORE_SUFFIX
 #ifdef FORTRAN_UPPERCASE
-#define slaAoppa SLA_AOPPA__
-#define slaAopqk SLA_AOPQK__
-#define slaOapqk SLA_OAPQK__
+#define slaAoppa _SLA_AOPPA__
+#define slaAopqk _SLA_AOPQK__
+#define slaOapqk _SLA_OAPQK__
 #else
-#define slaAoppa sla_aoppa__
-#define slaAopqk sla_aopqk__
-#define slaOapqk sla_oapqk__
+#define slaAoppa _sla_aoppa__
+#define slaAopqk _sla_aopqk__
+#define slaOapqk _sla_oapqk__
 #endif
 #elseif FORTRAN_NO_UNDERSCORE_SUFFIX
 #ifdef FORTRAN_UPPERCASE
-#define slaAoppa SLA_AOPPA
-#define slaAopqk SLA_AOPQK
-#define slaOapqk SLA_OAPQK
+#define slaAoppa _SLA_AOPPA
+#define slaAopqk _SLA_AOPQK
+#define slaOapqk _SLA_OAPQK
 #else
-#define slaAoppa sla_aoppa
-#define slaAopqk sla_aopqk
-#define slaOapqk sla_oapqk
+#define slaAoppa _sla_aoppa
+#define slaAopqk _sla_aopqk
+#define slaOapqk _sla_oapqk
 #endif
 #else
 #ifdef FORTRAN_UPPERCASE
-#define slaAoppa SLA_AOPPA_
-#define slaAopqk SLA_AOPQK_
-#define slaOapqk SLA_OAPQK_
+#define slaAoppa _SLA_AOPPA_
+#define slaAopqk _SLA_AOPQK_
+#define slaOapqk _SLA_OAPQK_
 #else
-#define slaAoppa sla_aoppa_
-#define slaAopqk sla_aopqk_
-#define slaOapqk sla_oapqk_
+#define slaAoppa _sla_aoppa_
+#define slaAopqk _sla_aopqk_
+#define slaOapqk _sla_oapqk_
 #endif
 #endif