]> https://gitweb.dealii.org/ - dealii-svn.git/commitdiff
Use proper argument types for the single precision functions
authorbangerth <bangerth@0785d39b-7218-0410-832d-ea1e28bc413d>
Fri, 15 Sep 2006 17:36:30 +0000 (17:36 +0000)
committerbangerth <bangerth@0785d39b-7218-0410-832d-ea1e28bc413d>
Fri, 15 Sep 2006 17:36:30 +0000 (17:36 +0000)
git-svn-id: https://svn.dealii.org/trunk@13908 0785d39b-7218-0410-832d-ea1e28bc413d

deal.II/lac/include/lac/lapack_templates.h

index 5d817fb5305bb8a8797658c61b2e97f0845f352c..d6803b9eb01198613ee5bbae55bb316f7f564a55 100644 (file)
@@ -121,7 +121,7 @@ gemv (const char* trans, const int* m, const int* n, const float* alpha, const f
 }
 #else
 inline void
-gemv (const char*, const int*, const int*, const double*, const double*, const int*, const double*, const int*, const double*, double*, const int*)
+gemv (const char*, const int*, const int*, const float*, const float*, const int*, const float*, const int*, const float*, float*, const int*)
 {
   LAPACKSupport::ExcMissing("sgemv");
 }
@@ -151,7 +151,7 @@ geev (const char* jobvl, const char* jobvr, const int* n, float* A, const int* l
 }
 #else
 inline void
-geev (const char*, const char*, const int*, double*, const int*, double*, double*, double*, const int*, double*, const int*, double*, const int*, int*)
+geev (const char*, const char*, const int*, float*, const int*, float*, float*, float*, const int*, float*, const int*, float*, const int*, int*)
 {
   LAPACKSupport::ExcMissing("sgeev");
 }
@@ -181,7 +181,7 @@ geevx (const char* balanc, const char* jobvl, const char* jobvr, const char* sen
 }
 #else
 inline void
-geevx (const char*, const char*, const char*, const char*, const int*, double*, const int*, double*, double*, double*, const int*, double*, const int*, int*, int*, double*, double*, double*, double*, double*, const int*, int*, int*)
+geevx (const char*, const char*, const char*, const char*, const int*, float*, const int*, float*, float*, float*, const int*, float*, const int*, int*, int*, float*, float*, float*, float*, float*, const int*, int*, int*)
 {
   LAPACKSupport::ExcMissing("sgeevx");
 }
@@ -211,7 +211,7 @@ gesvd (int* jobu, int* jobvt, const int* n, const int* m, float* A, const int* l
 }
 #else
 inline void
-gesvd (int*, int*, const int*, const int*, double*, const int*, double*, double*, const int*, double*, const int*, double*, const int*, int*)
+gesvd (int*, int*, const int*, const int*, float*, const int*, float*, float*, const int*, float*, const int*, float*, const int*, int*)
 {
   LAPACKSupport::ExcMissing("sgesvd");
 }
@@ -241,7 +241,7 @@ stev (const char* jobz, const int* n, float* d, float* e, float* z, const int* l
 }
 #else
 inline void
-stev (const char*, const int*, double*, double*, double*, const int*, double*, int*)
+stev (const char*, const int*, float*, float*, float*, const int*, float*, int*)
 {
   LAPACKSupport::ExcMissing("sstev");
 }

In the beginning the Universe was created. This has made a lot of people very angry and has been widely regarded as a bad move.

Douglas Adams


Typeset in Trocchi and Trocchi Bold Sans Serif.