[cig-commits] r4153 - in long/3D/Gale/trunk/src/StGermain: . Discretisation/Geometry/src

[walter at geodynamics.org]

Author: walter
Date: 2006-08-01 01:53:57 -0700 (Tue, 01 Aug 2006)
New Revision: 4153

Modified:
   long/3D/Gale/trunk/src/StGermain/
   long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/Geometry.h
   long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/stg_lapack.h
Log:
 r2615 at earth:  boo | 2006-08-01 01:50:42 -0700
  r2594 at earth (orig r3717):  KathleenHumble | 2006-07-26 21:48:02 -0700
  --turned off FullTensorMath and stg_lapack again.
  
 



Property changes on: long/3D/Gale/trunk/src/StGermain
___________________________________________________________________
Name: svk:merge
   - 1ef209d2-b310-0410-a72d-e20c9eb0015c:/cig:2614
afb6c753-b9d0-0310-b4e7-dbd8d91cdd35:/trunk/StGermain:3716
   + 1ef209d2-b310-0410-a72d-e20c9eb0015c:/cig:2615
afb6c753-b9d0-0310-b4e7-dbd8d91cdd35:/trunk/StGermain:3717

Modified: long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/Geometry.h
===================================================================
--- long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/Geometry.h	2006-08-01 08:53:54 UTC (rev 4152)
+++ long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/Geometry.h	2006-08-01 08:53:57 UTC (rev 4153)
@@ -68,8 +68,6 @@
 	#include "Delaunay.h"
 	#include "ParallelDelaunay.h"
 	#include "ComplexVectorMath.h"
-	#include "stg_lapack.h"
-	#include "FullTensorMath.h"
 	#include "Init.h"
 	#include "Finalise.h"
 

Modified: long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/stg_lapack.h
===================================================================
--- long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/stg_lapack.h	2006-08-01 08:53:54 UTC (rev 4152)
+++ long/3D/Gale/trunk/src/StGermain/Discretisation/Geometry/src/stg_lapack.h	2006-08-01 08:53:57 UTC (rev 4153)
@@ -41,12 +41,16 @@
 
 #ifdef FORTRAN_NORMAL
 	#define stg_dgeev dgeev
+	#define stg_zgesvd zgesvd
 #elif FORTRAN_SINGLE_TRAILINGBAR
 	#define stg_dgeev dgeev_
+	#define stg_zgesvd zgesvd_
 #elif FORTRAN_DOUBLE_TRAILINGBAR
 	#define stg_dgeev dgeev__
+	#define stg_zgesvd zgesvd__
 #elif FORTRAN_UPPERCASE
 	#define stg_dgeev DGEEV
+	#define stg_zgesvd ZGESVD
 #endif	
 
 #endif