From 330101e0b38b95337818a27b29300f1637c1cce5 Mon Sep 17 00:00:00 2001
From: Martin Kroeker <martin@ruby.chemie.uni-freiburg.de>
Date: Mon, 11 Dec 2023 21:52:00 +0100
Subject: [PATCH] Add complex type definitions for MSVC

---
 lapack-netlib/LAPACKE/include/lapack.h | 9 +++++++++
 1 file changed, 9 insertions(+)

diff --git a/lapack-netlib/LAPACKE/include/lapack.h b/lapack-netlib/LAPACKE/include/lapack.h
index 28f8ad6551..dac6b22be7 100644
--- a/lapack-netlib/LAPACKE/include/lapack.h
+++ b/lapack-netlib/LAPACKE/include/lapack.h
@@ -37,7 +37,15 @@
 */
 
 #ifndef LAPACK_COMPLEX_CUSTOM
+#if defined(_MSC_VER)
+    #define _CRT_USE_C_COMPLEX_H
+    #include <complex.h>
+    #define LAPACK_COMPLEX_CUSTOM
+    #define lapack_complex_float _Fcomplex
+    #define lapack_complex_double _Dcomplex
+#endif
 
+#else
 /* Complex type (single precision) */
 #ifndef lapack_complex_float
 #ifndef __cplusplus
@@ -74,6 +82,7 @@
 #define lapack_complex_double_imag(z)       (cimag(z))
 #endif
 
+#endif
 #endif /* LAPACK_COMPLEX_CUSTOM */