From e7112a57a61fe189fb43949b89a2c73fd90f37a7 Mon Sep 17 00:00:00 2001
From: jofret
Date: Mon, 16 Jun 2008 05:28:22 +0000
Subject: - Array extraction complete - Some tests added
---
src/type/testDoubleComplex.c | 11 +++++++++++
1 file changed, 11 insertions(+)
(limited to 'src/type/testDoubleComplex.c')
diff --git a/src/type/testDoubleComplex.c b/src/type/testDoubleComplex.c
index 4e51cd18..fa40f627 100644
--- a/src/type/testDoubleComplex.c
+++ b/src/type/testDoubleComplex.c
@@ -24,6 +24,8 @@ int matrixCreation(void) {
double imag[size];
doubleComplex *Z;
+ double extractedReal[size];
+ double extractedImag[size];
int i = 0;
@@ -43,6 +45,15 @@ int matrixCreation(void) {
assert(zimags(Z[i]) == size - i);
}
+ zreala(Z, size, extractedReal);
+ zimaga(Z, size, extractedImag);
+ for (i = 0; i < size; ++i)
+ {
+ printf("Partie reelle = %f\n", extractedReal[i]);
+ assert(extractedReal[i] == i);
+ printf("Partie imaginaire = %f\n", extractedImag[i]);
+ assert(extractedImag[i] == size - i);
+ }
return 0;
}
--
cgit